home *** CD-ROM | disk | FTP | other *** search
- object SwatForm: TSwatForm
- Left = 566
- Top = 362
- Width = 290
- Height = 459
- Caption = 'Swat!'
- Color = clSilver
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Menu = MainMenu1
- OldCreateOrder = False
- OnCreate = FormCreate
- OnMouseDown = FormMouseDown
- OnMouseUp = FormMouseUp
- PixelsPerInch = 96
- TextHeight = 13
- object GameOverImage: TImage
- Left = 10
- Top = 72
- Width = 262
- Height = 145
- AutoSize = True
- Picture.Data = {<image000.bmp>}
- Transparent = True
- end
- object Image1: TImage
- Left = 11
- Top = 256
- Width = 260
- Height = 156
- AutoSize = True
- Picture.Data = {<image001.bmp>}
- Transparent = True
- end
- object TimeLabel: TLabel
- Left = 122
- Top = 296
- Width = 18
- Height = 19
- Caption = '00'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -16
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object MissLabel: TLabel
- Left = 78
- Top = 351
- Width = 9
- Height = 19
- Caption = '0'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -16
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object HitsLabel: TLabel
- Left = 41
- Top = 351
- Width = 9
- Height = 19
- Caption = '0'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -16
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object EscapedLabel: TLabel
- Left = 134
- Top = 351
- Width = 9
- Height = 19
- Caption = '0'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -16
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object ScoreLabel: TLabel
- Left = 205
- Top = 351
- Width = 9
- Height = 19
- Caption = '0'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -16
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object MainMenu1: TMainMenu
- object Gamr1: TMenuItem
- Caption = '&Game'
- object New1: TMenuItem
- Caption = '&New'
- OnClick = New1Click
- end
- object Options1: TMenuItem
- Caption = '&Options...'
- OnClick = Options1Click
- end
- object Stop1: TMenuItem
- Caption = '&Stop'
- Enabled = False
- OnClick = Stop1Click
- end
- end
- object Pause1: TMenuItem
- Caption = '&Pause'
- OnClick = Pause1Click
- end
- object About1: TMenuItem
- Caption = '&About'
- OnClick = About1Click
- end
- end
- object Timer1: TTimer
- Enabled = False
- Interval = 100
- OnTimer = Timer1Timer
- Left = 32
- end
- end
-